home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d13 / qptech.arc / TI224.ASC < prev    next >
Text File  |  1991-04-25  |  5KB  |  331 lines
  1.  
  2.  
  3.  
  4.  
  5.  
  6.  
  7.  
  8. PRODUCT  :  QUATTRO PRO                            NUMBER  :  224
  9. VERSION  :  1.0
  10.      OS  :  MS/PC DOS
  11.    DATE  :  April 30, 1990                 PAGE  :  1/3
  12.  
  13.   TITLE  :  QUATTRO PRO AND THE LOTUS 2.2 LINKING FORMULA
  14.  
  15.  
  16.  
  17.  
  18. Since Lotus 2.2 saves files with the extension WK1, they are
  19. still somewhat compatible with 2.01.  Since Quattro Pro will load
  20. in these spreadsheets, it is possible to convert linking formulas
  21. created in Lotus 2.2 to Quattro Pro format.  When Lotus 2.2 saves
  22. a linked formula, it saves it in the following format:
  23.  
  24.     @@("<<filename>>address")
  25.  
  26.     where filename is the worksheet to get the data from, and
  27.     address is the address in the worksheet filename to get
  28.     data from.
  29.  
  30. The syntax of the Quattro Pro link formula, using the same
  31. arguments as above, is as follows:
  32.  
  33.     +[filename]address
  34.  
  35.     where filename and address are the same as above.
  36.  
  37. By replacing the << & >> characters in the Lotus 2.2 formula with
  38. the [ & ] in Quattro Pro, we can convert the Lotus formula into a
  39. Quattro Pro linking formula.  The macro below will traverse each
  40. cell of the current worksheet, and convert any link formulas that
  41. it finds.
  42.  
  43. To Run The Macro:
  44.  
  45.    1.  Enter this macro into a spreadsheet and save it as a macro
  46.        library.  Use / <E>dit <N>ames <L>abels <R>ight on the
  47.        first column of the macro to name all the macros
  48.        correctly.
  49.  
  50.    2.  Open the spreadsheet you wish to convert.
  51.  
  52.    3.  Select / <T>ools <M>acro <E>xecute (/ <W>orksheet <M>acro
  53.        <E>xecute in Lotus Compatible Menus).
  54.  
  55.    4.  Type in CONVERT, and press <Enter>.
  56.  
  57. NOTE that the windows have been turned off to speed execution, so
  58. you won't see the changes take place on the screen until the
  59. macro has finished.
  60.  
  61.  
  62.  
  63.  
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70.  
  71.  
  72.  
  73.  
  74. PRODUCT  :  QUATTRO PRO                            NUMBER  :  224
  75. VERSION  :  1.0
  76.      OS  :  MS/PC DOS
  77.    DATE  :  April 30, 1990                 PAGE  :  2/3
  78.  
  79.   TITLE  :  QUATTRO PRO AND THE LOTUS 2.2 LINKING FORMULA
  80.  
  81.  
  82.  
  83.  
  84.            The Macro In Cell-Formula Notation
  85.  
  86.  
  87.  A1: 'Convert
  88.  B1: '{indicate "WAIT"}{/ Defaults;Suppress}b
  89.  B2: '{/ Startup;Beep}n
  90.  B3: '{end}{home}{let maxrow,@cellpointer("row")}~
  91.  B4: '{let maxcol,@cellpointer("col")}~
  92.  B5: '{}
  93.  B6: '{home}{for row,0,maxrow-1,1,col_loop}
  94.  B7: '{indicate}{/ Startup;Beep}y~{quit}
  95.  A9: 'col_loop
  96.  B9: '{indicate @string(row,0)}
  97. B10: '{for col,0,maxcol-1,1,move}{down}{bigleft 32}{return}
  98. A12: 'move
  99. B12: '{recalc 2.2Converter}{2.2Converter}{right}{return}
  100. A14: 'maxrow
  101. B14: 0
  102. A15: 'maxcol
  103. B15: 0
  104. A16: 'row
  105. B16: 0
  106. A17: 'col
  107. B17: 0
  108. A19: '_CONTENT
  109. B19: @CELLPOINTER("contents")
  110. A21: '2.2Converter
  111. B21: +"{if #not# @iserr("&@CELLPOINTER("address")&")}{return}"
  112. B22: '{edit}{home}'+~{calc}
  113. B23: '{if @iserr(@find("@@(""<<",_CONTENT,0))}{edit}{home}{del
  114. 2}~{return}
  115. B24: '{edit}{home}{del 2}~
  116. B25: '{EDIT}
  117. B26: '{HOME}
  118. B27: '{DEL 3}+
  119. B28: '{END}
  120. B29: '{BACKSPACE}~
  121. B30: '{/ Audit;SearchReset}
  122. B31: '{/ Audit;ReplaceRange}~
  123. B32: '{/ Audit;SearchString}<<~
  124. B33: '{/ Audit;ReplaceString}[~
  125. B34: '{/ Audit;Replace}a
  126. B35: '{/ Audit;SearchReset}
  127.  
  128.  
  129.  
  130.  
  131.  
  132.  
  133.  
  134.  
  135.  
  136.  
  137.  
  138.  
  139.  
  140. PRODUCT  :  QUATTRO PRO                            NUMBER  :  224
  141. VERSION  :  1.0
  142.      OS  :  MS/PC DOS
  143.    DATE  :  April 30, 1990                 PAGE  :  3/3
  144.  
  145.   TITLE  :  QUATTRO PRO AND THE LOTUS 2.2 LINKING FORMULA
  146.  
  147.  
  148.  
  149.  
  150. B36: '{/ Audit;ReplaceRange}~
  151. B37: '{/ Audit;SearchString}>>~
  152. B38: '{/ Audit;ReplaceString}]~
  153. B39: '{/ Audit;Replace}a
  154. B40: '{EDIT}
  155. B41: '{BACKSPACE}
  156. B42: '{HOME}
  157. B43: '{RIGHT}
  158. B44: '{DEL}~
  159. B45: '{return}
  160.  
  161.  
  162.  
  163.  
  164.  
  165.  
  166.  
  167.  
  168.  
  169.  
  170.  
  171.  
  172.  
  173.  
  174.  
  175.  
  176.  
  177.  
  178.  
  179.  
  180.  
  181.  
  182.  
  183.  
  184.  
  185.  
  186.  
  187.  
  188.  
  189.  
  190.  
  191.  
  192.  
  193.  
  194.  
  195.  
  196.  
  197.  
  198.  
  199.  
  200.  
  201.  
  202.  
  203.  
  204.  
  205.  
  206. PRODUCT  :  QUATTRO PRO                            NUMBER  :  224
  207. VERSION  :  1.0
  208.      OS  :  MS/PC DOS
  209.    DATE  :  April 30, 1990                 PAGE  :  4/3
  210.  
  211.   TITLE  :  QUATTRO PRO AND THE LOTUS 2.2 LINKING FORMULA
  212.  
  213.  
  214.  
  215.  
  216.        The Macro As It Appears In The Spreadsheet
  217.  
  218.  
  219. Convert      {indicate "WAIT"}{/ Defaults;Suppress}b
  220.          {/ Startup;Beep}n
  221.          {end}{home}{let maxrow,@cellpointer("row")}~
  222.          {let maxcol,@cellpointer("col")}~
  223.          {}
  224.          {home}{for row,0,maxrow-1,1,col_loop}
  225.          {indicate}{/ Startup;Beep}y~{quit}
  226.  
  227. col_loop     {indicate @string(row,0)}
  228.          {for col,0,maxcol-1,1,move}{down}{bigleft
  229. 32}{return}
  230.  
  231. move         {recalc 2.2Converter}{2.2Converter}{right}{return}
  232.  
  233. maxrow         0
  234. maxcol         0
  235. row         0
  236. col         0
  237.  
  238. _CONTENT        0
  239.  
  240. 2.2Converter {if #not# @iserr($B$18)}{return}
  241.          {edit}{home}'+~{calc}
  242.          {if
  243. @iserr(@find("@@(""<<",_CONTENT,0))}{edit}{home}{del 2}~{return}
  244.          {edit}{home}{del 2}~
  245.          {EDIT}
  246.          {HOME}
  247.          {DEL 3}+
  248.          {END}
  249.          {BACKSPACE}~
  250.          {/ Audit;SearchReset}
  251.          {/ Audit;ReplaceRange}~
  252.          {/ Audit;SearchString}<<~
  253.          {/ Audit;ReplaceString}[~
  254.          {/ Audit;Replace}a
  255.          {/ Audit;SearchReset}
  256.          {/ Audit;ReplaceRange}~
  257.          {/ Audit;SearchString}>>~
  258.          {/ Audit;ReplaceString}]~
  259.  
  260.  
  261.  
  262.  
  263.  
  264.  
  265.  
  266.  
  267.  
  268.  
  269.  
  270.  
  271.  
  272. PRODUCT  :  QUATTRO PRO                            NUMBER  :  224
  273. VERSION  :  1.0
  274.      OS  :  MS/PC DOS
  275.    DATE  :  April 30, 1990                 PAGE  :  5/3
  276.  
  277.   TITLE  :  QUATTRO PRO AND THE LOTUS 2.2 LINKING FORMULA
  278.  
  279.  
  280.  
  281.  
  282.          {/ Audit;Replace}a
  283.          {EDIT}
  284.          {BACKSPACE}
  285.          {HOME}
  286.          {RIGHT}
  287.          {DEL}~
  288.          {return}
  289.  
  290.  
  291.  
  292.  
  293.  
  294.  
  295.  
  296.  
  297.  
  298.  
  299.  
  300.  
  301.  
  302.  
  303.  
  304.  
  305.  
  306.  
  307.  
  308.  
  309.  
  310.  
  311.  
  312.  
  313.  
  314.  
  315.  
  316.  
  317.  
  318.  
  319.  
  320.  
  321.  
  322.  
  323.  
  324.  
  325.  
  326.  
  327.  
  328.  
  329.  
  330.  
  331.